home *** CD-ROM | disk | FTP | other *** search
- object Inspector: TInspector
- Left = 190
- Top = 395
- HorzScrollBar.Visible = False
- VertScrollBar.Visible = False
- AutoScroll = False
- Caption = 'Inspector'
- ClientHeight = 245
- ClientWidth = 178
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- PixelsPerInch = 120
- TextHeight = 16
- object TabbedNotebook1: TTabbedNotebook
- Left = 0
- Top = 0
- Width = 178
- Height = 245
- Align = alClient
- TabFont.Color = clBtnText
- TabFont.Height = -13
- TabFont.Name = 'MS Sans Serif'
- TabFont.Style = []
- TabOrder = 0
- object TTabPage
- Left = 4
- Top = 27
- Caption = 'Values'
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 170
- Height = 214
- Align = alClient
- BevelOuter = bvLowered
- TabOrder = 0
- object Panel2: TPanel
- Left = 8
- Top = 8
- Width = 153
- Height = 33
- Alignment = taLeftJustify
- BevelInner = bvLowered
- Caption = ' Name'
- TabOrder = 0
- object Namevalue: TEdit
- Left = 64
- Top = 8
- Width = 81
- Height = 21
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Small Fonts'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnChange = NamevalueChange
- OnKeyPress = NamevalueKeyPress
- end
- end
- object Panel3: TPanel
- Left = 8
- Top = 48
- Width = 153
- Height = 33
- Alignment = taLeftJustify
- BevelInner = bvLowered
- Caption = ' Left'
- TabOrder = 1
- object Leftvalue: TEdit
- Left = 64
- Top = 8
- Width = 81
- Height = 21
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Small Fonts'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnChange = LeftvalueChange
- OnKeyPress = LeftvalueKeyPress
- end
- end
- object Panel4: TPanel
- Left = 8
- Top = 88
- Width = 153
- Height = 33
- Alignment = taLeftJustify
- BevelInner = bvLowered
- Caption = ' Top'
- TabOrder = 2
- object Topvalue: TEdit
- Left = 64
- Top = 8
- Width = 81
- Height = 21
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Small Fonts'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnChange = TopvalueChange
- OnKeyPress = TopvalueKeyPress
- end
- end
- object Panel5: TPanel
- Left = 8
- Top = 128
- Width = 153
- Height = 33
- Alignment = taLeftJustify
- BevelInner = bvLowered
- Caption = ' Caption'
- TabOrder = 3
- object Captionvalue: TEdit
- Left = 64
- Top = 8
- Width = 81
- Height = 21
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Small Fonts'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnChange = CaptionvalueChange
- OnKeyPress = CaptionvalueKeyPress
- end
- end
- object Panel6: TPanel
- Left = 8
- Top = 168
- Width = 153
- Height = 33
- Alignment = taLeftJustify
- BevelInner = bvLowered
- Caption = ' Fontcolor'
- TabOrder = 4
- object Fontcolorvalue: TComboBox
- Left = 64
- Top = 8
- Width = 81
- Height = 21
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Small Fonts'
- Font.Style = []
- ItemHeight = 13
- Items.Strings = (
- 'black'
- 'blue'
- 'cyan'
- 'darkgray'
- 'gray'
- 'green'
- 'lightgray'
- 'magenta'
- 'orange'
- 'pink'
- 'red'
- 'white'
- 'yellow')
- ParentFont = False
- TabOrder = 0
- OnChange = FontcolorvalueChange
- end
- end
- end
- end
- end
- end
-